home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 4
/
64er_Magazin_Sonderheft_04_86-04_1986_Markt__Technik_de_Disk_1_of_2_Side_A.d64
/
listing 07.d
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
184b
|
8 lines
10 dim x$(2000)
20 x$(2000)="mike"
30 rem suchroutine
35 ti$="000000":rem stoppuhr auf null
40 fori=1to2000
50 :ifx$(i)="mike"thenprint"mike steht in satz";i:print"benoetigte zeit:";ti$
60 nexti